﻿object PasportFr: TPasportFr
  Left = 0
  Top = 0
  Width = 923
  Height = 855
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'Tahoma'
  Font.Style = []
  ParentFont = False
  TabOrder = 0
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 923
    Height = 697
    ActivePage = TabSheet3
    Align = alTop
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = #1054#1073#1097#1072#1103' '#1080#1085#1092#1086#1088#1084#1072#1094#1080#1103
      object GroupBox3: TGroupBox
        Left = 3
        Top = 3
        Width = 909
        Height = 110
        TabOrder = 0
        object lbI: TLabel
          Left = 16
          Top = 76
          Width = 55
          Height = 16
          Caption = #1054#1090#1095#1077#1089#1090#1074#1086
        end
        object lbF: TLabel
          Left = 16
          Top = 11
          Width = 53
          Height = 16
          Caption = #1060#1072#1084#1080#1083#1080#1103
        end
        object lbNac: TLabel
          Left = 511
          Top = 76
          Width = 97
          Height = 16
          Caption = #1053#1072#1094#1080#1086#1085#1072#1083#1100#1085#1086#1089#1090#1100
        end
        object Label2: TLabel
          Left = 509
          Top = 41
          Width = 99
          Height = 16
          Caption = #1052#1077#1089#1090#1086' '#1088#1086#1078#1076#1077#1085#1080#1103
        end
        object LbBD: TLabel
          Left = 516
          Top = 11
          Width = 92
          Height = 16
          Caption = #1044#1072#1090#1072' '#1088#1086#1078#1076#1077#1085#1080#1103
        end
        object lbO: TLabel
          Left = 16
          Top = 43
          Width = 23
          Height = 16
          Caption = #1048#1084#1103
        end
        object edO: TDBEdit
          Left = 123
          Top = 68
          Width = 311
          Height = 24
          DataField = 'PAT_O'
          DataSource = dmMain.dsPat
          TabOrder = 2
        end
        object edMJ: TDBEdit
          Left = 623
          Top = 38
          Width = 250
          Height = 24
          DataField = 'PLACE_OF_BD'
          DataSource = dmMain.dsPat
          TabOrder = 4
        end
        object edBD: TDBEdit
          Left = 623
          Top = 8
          Width = 250
          Height = 24
          DataField = 'PAT_BD'
          DataSource = dmMain.dsPat
          TabOrder = 3
        end
        object edI: TDBEdit
          Left = 123
          Top = 38
          Width = 311
          Height = 24
          DataField = 'PAT_I'
          DataSource = dmMain.dsPat
          TabOrder = 1
        end
        object edF: TDBEdit
          Left = 123
          Top = 8
          Width = 311
          Height = 24
          DataField = 'PAT_F'
          DataSource = dmMain.dsPat
          TabOrder = 0
        end
        object dbLCBNac: TDBLookupComboBox
          Left = 623
          Top = 68
          Width = 250
          Height = 24
          DataField = 'NAC_ID'
          DataSource = dmMain.dsPat
          KeyField = 'NAC_ID'
          ListField = 'NAC_NAME'
          ListSource = dmMain.dsNac
          TabOrder = 5
        end
      end
      object GroupBox4: TGroupBox
        Left = 3
        Top = 135
        Width = 909
        Height = 162
        TabOrder = 1
        object Label1: TLabel
          Left = 480
          Top = 27
          Width = 128
          Height = 16
          Caption = #1057#1077#1084#1077#1081#1085#1086#1077' '#1087#1086#1083#1086#1078#1077#1085#1080#1077
        end
        object LbDockum: TLabel
          Left = 15
          Top = 26
          Width = 86
          Height = 16
          Caption = #1042#1080#1076' '#1076#1086#1082#1091#1084#1077#1085#1090#1072
        end
        object lbNumber: TLabel
          Left = 236
          Top = 53
          Width = 37
          Height = 16
          Caption = #1053#1086#1084#1077#1088
        end
        object lbSeries: TLabel
          Left = 16
          Top = 58
          Width = 36
          Height = 16
          Caption = #1057#1077#1088#1080#1103
        end
        object lbVidan: TLabel
          Left = 16
          Top = 90
          Width = 37
          Height = 16
          Caption = #1042#1099#1076#1072#1085
        end
        object Label29: TLabel
          Left = 15
          Top = 123
          Width = 77
          Height = 16
          Caption = #1044#1072#1090#1072' '#1074#1099#1076#1072#1095#1080
        end
        object Label43: TLabel
          Left = 256
          Top = 123
          Width = 115
          Height = 16
          Caption = #1050#1086#1076' '#1087#1086#1076#1088#1072#1079#1076#1077#1083#1077#1085#1080#1103
        end
        object lbTelefone: TLabel
          Left = 555
          Top = 115
          Width = 53
          Height = 16
          Caption = #1058#1077#1083#1077#1092#1086#1085
        end
        object Label49: TLabel
          Left = 491
          Top = 56
          Width = 117
          Height = 16
          Caption = #1056#1077#1075#1080#1086#1085' '#1087#1088#1086#1078#1080#1074#1072#1085#1080#1103
        end
        object Label3: TLabel
          Left = 573
          Top = 85
          Width = 35
          Height = 16
          Caption = #1043#1086#1088#1086#1076
        end
        object dbLCBTownInfo: TDBLookupComboBox
          Left = 623
          Top = 81
          Width = 250
          Height = 24
          DataField = 'TWN_CODE'
          DataSource = dmMain.dsPat
          KeyField = 'TWN_CODE'
          ListField = 'TWN_NAME'
          ListSource = dmMain.dsTownInfo
          TabOrder = 7
        end
        object DBLookupComboBox3: TDBLookupComboBox
          AlignWithMargins = True
          Left = 123
          Top = 19
          Width = 311
          Height = 24
          DataField = 'DOCUMENT_ID'
          DataSource = dmMain.dsPat
          DropDownRows = 10
          KeyField = 'DOCUM_ID'
          ListField = 'TYPE_OF_DOCUM'
          ListSource = dmMain.dsTypeDoc
          TabOrder = 0
        end
        object DBLookupComboBox4: TDBLookupComboBox
          Left = 623
          Top = 19
          Width = 250
          Height = 24
          DataField = 'SP_ID'
          DataSource = dmMain.dsPat
          KeyField = 'SP_ID'
          ListField = 'SP_NAME'
          ListSource = dmMain.dsSP
          TabOrder = 6
        end
        object edDateVidan: TDBEdit
          Left = 121
          Top = 117
          Width = 100
          Height = 24
          DataField = 'DATE_OF_GAIN'
          DataSource = dmMain.dsPat
          TabOrder = 4
        end
        object edNumber: TDBEdit
          Left = 123
          Top = 49
          Width = 55
          Height = 24
          DataField = 'NUMBER'
          DataSource = dmMain.dsPat
          TabOrder = 1
        end
        object edOtdelenieVidan: TDBEdit
          Left = 123
          Top = 79
          Width = 309
          Height = 24
          DataField = 'PLACE_OF_GAIN'
          DataSource = dmMain.dsPat
          TabOrder = 3
        end
        object edSeries: TDBEdit
          Left = 295
          Top = 49
          Width = 66
          Height = 24
          DataField = 'SERIES'
          DataSource = dmMain.dsPat
          TabOrder = 2
        end
        object DBEdit23: TDBEdit
          Left = 377
          Top = 117
          Width = 128
          Height = 24
          DataField = 'COD_PODRAZ'
          DataSource = dmMain.dsPat
          TabOrder = 5
        end
        object edtelefone: TDBEdit
          Left = 623
          Top = 111
          Width = 250
          Height = 24
          DataField = 'PAT_PHONE'
          DataSource = dmMain.dsPat
          TabOrder = 8
        end
        object DBLookupComboBox9: TDBLookupComboBox
          Left = 623
          Top = 51
          Width = 250
          Height = 24
          DataField = 'REGION_COD'
          DataSource = dmMain.dsPat
          KeyField = 'REGION_COD'
          ListField = 'REGION_NAME'
          ListSource = dmMain.dsRegion
          TabOrder = 9
        end
      end
      object GroupBox5: TGroupBox
        Left = 3
        Top = 303
        Width = 909
        Height = 170
        TabOrder = 2
        object Label42: TLabel
          Left = 16
          Top = 101
          Width = 100
          Height = 16
          Caption = #1057#1090#1088#1072#1093#1086#1074#1086#1081' '#1087#1086#1083#1080#1089
        end
        object Label44: TLabel
          Left = 15
          Top = 129
          Width = 36
          Height = 16
          Caption = #1057#1077#1088#1080#1103
        end
        object Label45: TLabel
          Left = 213
          Top = 127
          Width = 37
          Height = 16
          Caption = #1053#1086#1084#1077#1088
        end
        object lbWork: TLabel
          Left = 16
          Top = 49
          Width = 83
          Height = 16
          Caption = #1052#1077#1089#1090#1086' '#1088#1072#1073#1086#1090#1099
        end
        object Label48: TLabel
          Left = 16
          Top = 19
          Width = 90
          Height = 16
          Caption = #1056#1072#1073#1086#1095#1080#1081' '#1089#1090#1072#1090#1091#1089
        end
        object DBEdit29: TDBEdit
          Left = 121
          Top = 127
          Width = 72
          Height = 24
          DataField = 'IP_SERIES'
          DataSource = dmMain.dsPat
          TabOrder = 2
        end
        object DBEdit30: TDBEdit
          Left = 271
          Top = 127
          Width = 161
          Height = 24
          DataField = 'IP_NUMBER'
          DataSource = dmMain.dsPat
          TabOrder = 3
        end
        object DBLookupComboBox6: TDBLookupComboBox
          Left = 122
          Top = 97
          Width = 311
          Height = 24
          DataField = 'POLIS'
          DataSource = dmMain.dsPat
          KeyField = 'ID'
          ListField = 'IP_NAME'
          ListSource = dmMain.dsPOLICY
          TabOrder = 1
        end
        object edWork: TDBEdit
          Left = 121
          Top = 47
          Width = 752
          Height = 24
          DataField = 'PAT_WORK'
          DataSource = dmMain.dsPat
          TabOrder = 0
        end
        object DBLookupComboBox8: TDBLookupComboBox
          Left = 121
          Top = 17
          Width = 311
          Height = 24
          DataField = 'STAT_ID'
          DataSource = dmMain.dsPat
          KeyField = 'STAT_ID'
          ListField = 'STAT_NAME'
          ListSource = dmMain.dsStatusPat
          TabOrder = 4
        end
      end
    end
    object TabSheet2: TTabSheet
      Caption = #1052#1077#1076#1080#1094#1080#1085#1089#1082#1072#1103' '#1080#1085#1092#1086#1088#1084#1072#1094#1080#1103
      ImageIndex = 1
      object ГруппаКрови: TGroupBox
        Left = 0
        Top = 3
        Width = 472
        Height = 126
        TabOrder = 0
        object Label7: TLabel
          Left = 17
          Top = 27
          Width = 125
          Height = 16
          Caption = #1043#1088#1091#1087#1087#1072' '#1082#1088#1086#1074#1080' '#1084#1072#1090#1077#1088#1080
        end
        object lbRH: TLabel
          Left = 16
          Top = 57
          Width = 126
          Height = 16
          Caption = #1056#1077#1079#1091#1089'-'#1092#1072#1082#1090#1086#1088' '#1084#1072#1090#1077#1088#1080
        end
        object Label10: TLabel
          Left = 259
          Top = 25
          Width = 110
          Height = 16
          Caption = #1043#1088#1091#1087#1087#1072' '#1082#1088#1086#1074#1080' '#1086#1090#1094#1072
        end
        object Label11: TLabel
          Left = 259
          Top = 50
          Width = 111
          Height = 16
          Caption = #1056#1077#1079#1091#1089'-'#1092#1072#1082#1090#1086#1088' '#1086#1090#1094#1072
        end
        object lbHB: TLabel
          Left = 16
          Top = 91
          Width = 69
          Height = 16
          Caption = #1043#1077#1084#1086#1075#1083#1086#1073#1080#1085
        end
        object DBLookupComboBox2: TDBLookupComboBox
          Left = 170
          Top = 22
          Width = 50
          Height = 24
          DataField = 'GB_ID'
          DataSource = dmMain.dsPat
          KeyField = 'GB_ID'
          ListField = 'GROUP_AB0'
          ListSource = dmMain.dsGB
          TabOrder = 0
        end
        object cb: TDBComboBox
          Left = 170
          Top = 52
          Width = 51
          Height = 24
          DataField = 'RH'
          DataSource = dmMain.dsPat
          Items.Strings = (
            '+'
            '-')
          TabOrder = 1
        end
        object DBLookupComboBox1: TDBLookupComboBox
          Left = 405
          Top = 22
          Width = 49
          Height = 24
          DataField = 'GROUP_AB0_otec'
          DataSource = dmMain.dsPat
          TabOrder = 3
        end
        object DBComboBox5: TDBComboBox
          Left = 405
          Top = 52
          Width = 49
          Height = 24
          DataField = 'PH_OTEC_ID'
          DataSource = dmMain.dsPat
          Items.Strings = (
            '+'
            '-')
          TabOrder = 4
        end
        object edHB: TDBEdit
          Left = 171
          Top = 82
          Width = 50
          Height = 24
          DataField = 'HB'
          DataSource = dmMain.dsPat
          TabOrder = 2
        end
        object btnHemoglobSpravka: TButton
          Left = 259
          Top = 82
          Width = 195
          Height = 25
          Caption = #1057#1087#1088#1072#1074#1082#1072' '#1087#1086' '#1075#1077#1084#1086#1075#1083#1086#1073#1080#1085#1091
          TabOrder = 5
          OnClick = btnHemoglobSpravkaClick
        end
      end
      object Анализы: TGroupBox
        Left = 0
        Top = 133
        Width = 912
        Height = 124
        Caption = #1040#1085#1072#1083#1080#1079#1099
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 1
        object Label4: TLabel
          Left = 12
          Top = 79
          Width = 121
          Height = 16
          Caption = #1056#1077#1072#1082#1094#1080#1103' '#1042#1072#1089#1089#1077#1088#1084#1072#1085#1072
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
        end
        object Label5: TLabel
          Left = 12
          Top = 49
          Width = 120
          Height = 16
          Caption = #1056#1077#1072#1082#1094#1080#1103' '#1085#1072' '#1075#1086#1085#1086#1088#1077#1102
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
        end
        object Label6: TLabel
          Left = 225
          Top = 22
          Width = 139
          Height = 13
          Caption = #1040#1083#1083#1077#1088#1075#1080#1095#1077#1089#1082#1080#1077' '#1088#1077#1072#1082#1094#1080#1080
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Tahoma'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object DBComboBox1: TDBComboBox
          Left = 157
          Top = 74
          Width = 51
          Height = 24
          DataField = 'RW'
          DataSource = dmMain.dsPat
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          Items.Strings = (
            '+'
            '-')
          ParentFont = False
          TabOrder = 1
        end
        object DBComboBox2: TDBComboBox
          Left = 157
          Top = 44
          Width = 51
          Height = 24
          DataField = 'GONOR'
          DataSource = dmMain.dsPat
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          Items.Strings = (
            '+'
            '-')
          ParentFont = False
          TabOrder = 0
        end
        object DBMemo4: TDBMemo
          Left = 225
          Top = 44
          Width = 672
          Height = 69
          DataField = 'ALL_REAK'
          DataSource = dmMain.dsPat
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          TabOrder = 2
        end
      end
      object Направление: TGroupBox
        Left = 478
        Top = 3
        Width = 434
        Height = 124
        Caption = #1053#1072#1087#1088#1072#1074#1083#1077#1085#1080#1077
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 2
        object Label12: TLabel
          Left = 21
          Top = 86
          Width = 72
          Height = 16
          Caption = #1057#1082#1086#1083#1100#1082#1086' '#1088#1072#1079
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
        end
        object Label8: TLabel
          Left = 21
          Top = 28
          Width = 96
          Height = 16
          Caption = #1050#1077#1084' '#1085#1072#1087#1088#1072#1074#1083#1077#1085#1072
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
        end
        object Label9: TLabel
          Left = 21
          Top = 58
          Width = 99
          Height = 16
          Caption = #1055#1086#1089#1077#1097#1072#1083#1072' '#1074#1088#1072#1095#1072
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
        end
        object DBLookupComboBox5: TDBLookupComboBox
          Left = 139
          Top = 28
          Width = 286
          Height = 24
          DataField = 'UCH'
          DataSource = dmMain.dsPat
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          KeyField = 'UCH_ID'
          ListField = 'UCH_NAME'
          ListSource = dmMain.dsUCH
          ParentFont = False
          TabOrder = 0
        end
        object DBComboBox4: TDBComboBox
          Left = 138
          Top = 58
          Width = 49
          Height = 24
          DataField = 'ATTENDANCE'
          DataSource = dmMain.dsPat
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          Items.Strings = (
            #1044#1072
            #1053#1077#1090)
          ParentFont = False
          TabOrder = 1
        end
        object DBEdit2: TDBEdit
          Left = 138
          Top = 88
          Width = 49
          Height = 24
          DataField = 'HOW_MANY_TIMES'
          DataSource = dmMain.dsPat
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          TabOrder = 2
        end
      end
      object Беременность: TGroupBox
        Left = -4
        Top = 263
        Width = 916
        Height = 202
        Caption = #1041#1077#1088#1077#1084#1077#1085#1085#1086#1089#1090#1100
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 3
        object Label18: TLabel
          Left = 14
          Top = 25
          Width = 163
          Height = 16
          Caption = #1055#1088#1077#1076#1099#1076#1091#1097#1072#1103' '#1073#1077#1088#1077#1084#1077#1085#1085#1086#1089#1090#1100
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
        end
        object Label21: TLabel
          Left = 629
          Top = 71
          Width = 130
          Height = 16
          Caption = #1057#1082#1086#1083#1100#1082#1086' '#1088#1086#1076#1086#1074' '#1078#1080#1074#1099#1093
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
        end
        object Label22: TLabel
          Left = 629
          Top = 93
          Width = 111
          Height = 16
          Caption = #1052#1077#1088#1090#1074#1086#1088#1086#1078#1076#1077#1085#1085#1099#1093
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
        end
        object Label23: TLabel
          Left = 629
          Top = 115
          Width = 43
          Height = 16
          Caption = #1059#1084#1077#1088#1083#1086
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
        end
        object Label27: TLabel
          Left = 629
          Top = 49
          Width = 36
          Height = 16
          Caption = #1056#1086#1076#1099
        end
        object DBEdit19: TDBEdit
          Left = 765
          Top = 71
          Width = 104
          Height = 24
          DataField = 'SK_DETEY_ZHIV'
          DataSource = dmMain.dsPat
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          TabOrder = 1
        end
        object DBEdit20: TDBEdit
          Left = 765
          Top = 101
          Width = 104
          Height = 24
          DataField = 'MERTVOROZH'
          DataSource = dmMain.dsPat
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          TabOrder = 2
        end
        object DBEdit21: TDBEdit
          Left = 765
          Top = 131
          Width = 104
          Height = 24
          DataField = 'UMERLO'
          DataSource = dmMain.dsPat
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          TabOrder = 3
        end
        object DBMemo1: TDBMemo
          Left = 14
          Top = 47
          Width = 580
          Height = 138
          DataField = 'PREVIOUS_BEREMENNOST'
          DataSource = dmMain.dsPat
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
        end
        object DBEdit8: TDBEdit
          Left = 765
          Top = 41
          Width = 104
          Height = 24
          DataField = 'BIRTH'
          DataSource = dmMain.dsPat
          TabOrder = 4
        end
      end
      object Заболевания: TGroupBox
        Left = 0
        Top = 471
        Width = 912
        Height = 140
        Caption = #1047#1072#1073#1086#1083#1077#1074#1072#1085#1080#1103
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 4
        object Label14: TLabel
          Left = 12
          Top = 25
          Width = 121
          Height = 16
          Caption = #1054#1073#1097#1080#1077' '#1079#1072#1073#1086#1083#1077#1074#1072#1085#1080#1103
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
        end
        object Label15: TLabel
          Left = 12
          Top = 55
          Width = 91
          Height = 16
          Caption = #1047#1076#1086#1088#1086#1074#1100#1077' '#1084#1091#1078#1072
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
        end
        object Label16: TLabel
          Left = 12
          Top = 85
          Width = 124
          Height = 16
          Caption = #1052#1077#1085#1089#1090#1088#1091#1072#1094#1080#1103', '#1083#1077#1090': '#1089' '
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
        end
        object Label17: TLabel
          Left = 12
          Top = 115
          Width = 187
          Height = 16
          Caption = #1043#1080#1085#1077#1082#1086#1083#1086#1075#1080#1095#1077#1089#1082#1080#1077' '#1079#1072#1073#1086#1083#1077#1074#1072#1085#1080#1103
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
        end
        object DBEdit15: TDBEdit
          Left = 225
          Top = 19
          Width = 328
          Height = 24
          DataField = 'OBSHIE_ZABOLEV'
          DataSource = dmMain.dsPat
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
        end
        object DBEdit16: TDBEdit
          Left = 225
          Top = 49
          Width = 328
          Height = 24
          DataField = 'ZDOR_MUZH'
          DataSource = dmMain.dsPat
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          TabOrder = 1
        end
        object DBEdit17: TDBEdit
          Left = 225
          Top = 109
          Width = 328
          Height = 24
          DataField = 'GYNECOLOG_DISEASES'
          DataSource = dmMain.dsPat
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          TabOrder = 3
        end
        object DBEdit3: TDBEdit
          Left = 225
          Top = 79
          Width = 328
          Height = 24
          DataField = 'MENSTRUATION'
          DataSource = dmMain.dsPat
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          TabOrder = 2
        end
      end
    end
    object TabSheet3: TTabSheet
      Caption = #1055#1077#1088#1074#1080#1095#1085#1099#1081' '#1086#1089#1084#1086#1090#1088
      ImageIndex = 2
      object GroupBox1: TGroupBox
        Left = 638
        Top = 3
        Width = 274
        Height = 190
        Caption = #1057#1077#1088#1076#1094#1077#1073#1080#1077#1085#1080#1077' '#1087#1083#1086#1076#1072
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 0
        object Label13: TLabel
          Left = 17
          Top = 34
          Width = 80
          Height = 16
          Caption = #1063#1080#1089#1083#1086' '#1091#1076#1072#1088#1086#1074
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
        end
        object Label40: TLabel
          Left = 17
          Top = 75
          Width = 81
          Height = 16
          Caption = #1052#1077#1089#1090#1086' '#1091#1076#1072#1088#1086#1074
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
        end
        object DBEdit24: TDBEdit
          Left = 112
          Top = 26
          Width = 153
          Height = 24
          DataField = 'CHISLO_UD_HEARTBEAT'
          DataSource = dmMain.dsPat
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
        end
        object DBLookupComboBox7: TDBLookupComboBox
          Left = 112
          Top = 67
          Width = 154
          Height = 24
          DataField = 'ID_MESTO_HEARTBEAT'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          KeyField = 'ID_MESTO_HEARTBEAT'
          ListField = 'MESTO_HEARTBEAT_NAME'
          ListSource = dmMain.dsHEARTBEAT
          ParentFont = False
          TabOrder = 1
        end
        object Button4: TButton
          Left = 16
          Top = 152
          Width = 249
          Height = 25
          Caption = #1055#1086#1082#1072#1079#1072#1090#1100' '#1085#1086#1088#1084#1099' '#1074#1077#1089#1072' '#1087#1083#1086#1076#1072
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          TabOrder = 2
          OnClick = Button4Click
        end
        object Button5: TButton
          Left = 16
          Top = 121
          Width = 249
          Height = 25
          Caption = #1055#1086#1082#1072#1079#1072#1090#1100' '#1089#1087#1088#1072#1074#1082#1091' '#1087#1086' '#1050#1058#1043
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          TabOrder = 3
          OnClick = Button5Click
        end
      end
      object GroupBox2: TGroupBox
        Left = 638
        Top = 200
        Width = 274
        Height = 161
        Caption = #1055#1088#1077#1076#1087#1086#1083#1072#1075#1072#1077#1084#1099#1081' '#1074#1077#1089' '#1087#1083#1086#1076#1072
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 1
        object Label31: TLabel
          Left = 18
          Top = 57
          Width = 141
          Height = 16
          Caption = #1054#1082#1088#1091#1078#1085#1086#1089#1090#1100' '#1078#1080#1074#1086#1090#1072', '#1089#1084
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
        end
        object Label32: TLabel
          Left = 18
          Top = 27
          Width = 127
          Height = 16
          Caption = #1042#1099#1089#1086#1090#1072' '#1076#1085#1072' '#1084#1072#1090#1082#1080', '#1089#1084
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
        end
        object Label41: TLabel
          Left = 18
          Top = 87
          Width = 163
          Height = 16
          Caption = #1055#1088#1077#1076#1087#1086#1083#1072#1075#1072#1077#1084#1099#1081' '#1074#1077#1089' '#1087#1083#1086#1076#1072
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
        end
        object DBEdit11: TDBEdit
          Left = 203
          Top = 55
          Width = 63
          Height = 24
          DataField = 'OKRUZH_ABDOMINAL'
          DataSource = dmMain.dsPat
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
        end
        object DBEdit12: TDBEdit
          Left = 203
          Top = 25
          Width = 62
          Height = 24
          DataField = 'VYS_DNA_MATKI'
          DataSource = dmMain.dsPat
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          TabOrder = 1
        end
        object DBEdit28: TDBEdit
          Left = 203
          Top = 85
          Width = 62
          Height = 24
          DataField = 'PREDPOLAG_VES_PLODA'
          DataSource = dmMain.dsPat
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          TabOrder = 2
        end
        object Button3: TButton
          Left = 14
          Top = 115
          Width = 249
          Height = 25
          Caption = #1042#1099#1095#1080#1089#1083#1080#1090#1100' '#1087#1088#1077#1076#1087#1086#1083#1072#1075#1072#1077#1084#1099#1081'  '#1074#1077#1089' '#1087#1083#1086#1076#1072
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          TabOrder = 3
          OnClick = Button3Click
        end
      end
      object GroupBox6: TGroupBox
        Left = 9
        Top = 3
        Width = 623
        Height = 190
        TabOrder = 2
        object Label37: TLabel
          Left = 13
          Top = 29
          Width = 107
          Height = 16
          Caption = #1044#1072#1090#1072' '#1087#1086#1089#1090#1091#1087#1083#1077#1085#1080#1103
        end
        object Label38: TLabel
          Left = 15
          Top = 75
          Width = 82
          Height = 16
          Caption = #1044#1072#1090#1072' '#1074#1099#1087#1080#1089#1082#1080
        end
        object DBEdit14: TDBEdit
          Left = 138
          Top = 72
          Width = 100
          Height = 24
          DataField = 'VYB_D'
          DataSource = dmMain.dsPat
          TabOrder = 0
        end
        object DBEdit13: TDBEdit
          Left = 137
          Top = 26
          Width = 100
          Height = 24
          DataField = 'POST_D'
          DataSource = dmMain.dsPat
          TabOrder = 1
        end
        object MonthCalendar1: TMonthCalendar
          Left = 414
          Top = 19
          Width = 191
          Height = 160
          Date = 41467.496452511570000000
          TabOrder = 2
        end
        object Button1: TButton
          Left = 243
          Top = 26
          Width = 156
          Height = 25
          Caption = #1042#1085#1077#1089#1090#1080' '#1074#1099#1076#1077#1083#1077#1085#1085#1091#1102' '#1076#1072#1090#1091
          TabOrder = 3
          OnClick = Button1Click
        end
        object Button2: TButton
          Left = 244
          Top = 72
          Width = 156
          Height = 25
          Caption = #1042#1085#1077#1089#1090#1080' '#1074#1099#1076#1077#1083#1077#1085#1085#1091#1102' '#1076#1072#1090#1091
          TabOrder = 4
          OnClick = Button2Click
        end
      end
      object GroupBox7: TGroupBox
        Left = 9
        Top = 208
        Width = 623
        Height = 153
        TabOrder = 3
        object Label20: TLabel
          Left = 13
          Top = 51
          Width = 48
          Height = 16
          Caption = #1056#1086#1089#1090', '#1089#1084
        end
        object Label24: TLabel
          Left = 13
          Top = 81
          Width = 39
          Height = 16
          Caption = #1042#1077#1089', '#1082#1075
        end
        object Label26: TLabel
          Left = 290
          Top = 81
          Width = 135
          Height = 16
          Caption = #1050#1086#1090#1086#1088#1072#1103' '#1073#1077#1088#1077#1084#1077#1085#1085#1086#1089#1090#1100
        end
        object Label28: TLabel
          Left = 290
          Top = 51
          Width = 142
          Height = 16
          Caption = #1055#1086#1089#1083#1077#1076#1085#1103#1103' '#1084#1077#1085#1089#1090#1088#1091#1072#1094#1080#1103
        end
        object Label30: TLabel
          Left = 13
          Top = 111
          Width = 43
          Height = 16
          Caption = #1058#1072#1079', '#1089#1084
        end
        object Label36: TLabel
          Left = 13
          Top = 21
          Width = 84
          Height = 16
          Caption = #1053#1086#1084#1077#1088' '#1087#1072#1083#1072#1090#1099
        end
        object Label25: TLabel
          Left = 290
          Top = 21
          Width = 77
          Height = 16
          Caption = #1058#1077#1084#1087#1077#1088#1072#1090#1091#1088#1072
        end
        object Label47: TLabel
          Left = 290
          Top = 112
          Width = 115
          Height = 16
          Caption = #1057#1088#1086#1082' '#1073#1077#1088#1077#1084#1077#1085#1085#1086#1089#1090#1080
        end
        object DBEdit1: TDBEdit
          Left = 109
          Top = 21
          Width = 60
          Height = 24
          DataField = 'PAL_ID'
          DataSource = dmMain.dsPat
          TabOrder = 0
        end
        object DBEdit10: TDBEdit
          Left = 108
          Top = 111
          Width = 60
          Height = 24
          DataField = 'TAZ'
          DataSource = dmMain.dsPat
          TabOrder = 1
        end
        object DBEdit4: TDBEdit
          Left = 108
          Top = 51
          Width = 61
          Height = 24
          DataField = 'PAT_HEIGHT'
          DataSource = dmMain.dsPat
          TabOrder = 2
        end
        object DBEdit5: TDBEdit
          Left = 109
          Top = 81
          Width = 60
          Height = 24
          DataField = 'PAT_WEIGHT'
          DataSource = dmMain.dsPat
          TabOrder = 3
        end
        object DBEdit6: TDBEdit
          Left = 449
          Top = 21
          Width = 62
          Height = 24
          DataField = 'TEMPERATURE'
          DataSource = dmMain.dsPat
          TabOrder = 4
        end
        object DBEdit7: TDBEdit
          Left = 449
          Top = 81
          Width = 62
          Height = 24
          DataField = 'BEREM'
          DataSource = dmMain.dsPat
          TabOrder = 5
        end
        object DBEdit9: TDBEdit
          Left = 449
          Top = 51
          Width = 62
          Height = 24
          DataField = 'LAST_MENSTRUATION'
          DataSource = dmMain.dsPat
          TabOrder = 6
        end
        object DBEdit18: TDBEdit
          Left = 449
          Top = 111
          Width = 62
          Height = 24
          DataField = 'SROK_BEREM'
          DataSource = dmMain.dsPat
          TabOrder = 7
        end
      end
      object GroupBox8: TGroupBox
        Left = 9
        Top = 367
        Width = 903
        Height = 290
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
        TabOrder = 4
        object Label19: TLabel
          Left = 15
          Top = 19
          Width = 121
          Height = 14
          Caption = #1055#1086#1083#1086#1078#1077#1085#1080#1077' '#1087#1083#1086#1076#1072':'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = 'Tahoma'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label33: TLabel
          Left = 660
          Top = 12
          Width = 76
          Height = 13
          Caption = #1043#1076#1077' '#1085#1072#1093#1086#1076#1080#1090#1089#1103
        end
        object Label34: TLabel
          Left = 444
          Top = 19
          Width = 134
          Height = 14
          Caption = #1055#1088#1077#1076#1083#1077#1078#1072#1097#1072#1103' '#1095#1072#1089#1090#1100':'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = 'Tahoma'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label35: TLabel
          Left = 160
          Top = 12
          Width = 130
          Height = 13
          Caption = #1055#1077#1088#1074#1086#1077' '#1096#1077#1083#1077#1074#1077#1085#1080#1077' '#1087#1083#1086#1076#1072
        end
        object Label39: TLabel
          Left = 15
          Top = 151
          Width = 252
          Height = 13
          Caption = #1058#1077#1095#1077#1085#1080#1077' '#1080' '#1086#1089#1083#1086#1078#1085#1077#1085#1080#1077' '#1085#1072#1089#1090#1086#1103#1097#1077#1081' '#1073#1077#1088#1077#1084#1077#1085#1085#1086#1089#1090#1080':'
          Color = clWhite
          ParentColor = False
        end
        object Label46: TLabel
          Left = 457
          Top = 151
          Width = 295
          Height = 13
          Caption = #1057#1086#1089#1090#1086#1103#1085#1080#1077' '#1087#1088#1080' '#1087#1086#1089#1090#1091#1087#1083#1077#1085#1080#1080', '#1076#1072#1085#1085#1099#1077' '#1085#1072#1088#1091#1078#1085#1086#1075#1086' '#1086#1089#1084#1086#1090#1088#1072':'
        end
        object DBEdit22: TDBEdit
          Left = 317
          Top = 12
          Width = 121
          Height = 21
          DataField = 'FIRST_CHEV_PLODA'
          DataSource = dmMain.dsPat
          TabOrder = 0
        end
        object DBEdit26: TDBEdit
          Left = 771
          Top = 12
          Width = 121
          Height = 21
          DataField = 'GDE_NAKH'
          DataSource = dmMain.dsPat
          TabOrder = 1
        end
        object DBMemo2: TDBMemo
          Left = 14
          Top = 39
          Width = 424
          Height = 106
          DataField = 'POL_PLODA'
          DataSource = dmMain.dsPat
          TabOrder = 2
        end
        object DBMemo3: TDBMemo
          Left = 457
          Top = 39
          Width = 432
          Height = 106
          DataField = 'PRED_CHAST'
          DataSource = dmMain.dsPat
          TabOrder = 3
        end
        object DBMemo5: TDBMemo
          Left = 15
          Top = 170
          Width = 423
          Height = 103
          DataField = 'BEREMENNOST'
          DataSource = dmMain.dsPat
          TabOrder = 4
        end
        object DBMemo6: TDBMemo
          Left = 457
          Top = 170
          Width = 432
          Height = 103
          DataField = 'SOST_PRI_POSTUP'
          DataSource = dmMain.dsPat
          TabOrder = 5
        end
      end
    end
    object TabSheet4: TTabSheet
      Caption = #1054#1089#1084#1086#1090#1088' '#1042#1088#1072#1095#1072
      ImageIndex = 3
      object lb1: TLabel
        Left = 3
        Top = 24
        Width = 43
        Height = 16
        Caption = #1057#1077#1088#1076#1094#1077
        FocusControl = dbeSerdce
      end
      object lb2: TLabel
        Left = 3
        Top = 74
        Width = 34
        Height = 16
        Caption = #1055#1091#1083#1100#1089
        FocusControl = dbePuls
      end
      object lb3: TLabel
        Left = 3
        Top = 125
        Width = 111
        Height = 16
        Caption = #1040#1044' '#1085#1072' '#1087#1088#1072#1074#1086#1081' '#1088#1091#1082#1077
      end
      object lb4: TLabel
        Left = 3
        Top = 176
        Width = 102
        Height = 16
        Caption = #1040#1076' '#1085#1072' '#1083#1077#1074#1086#1081' '#1088#1091#1082#1077
      end
      object lb5: TLabel
        Left = 0
        Top = 226
        Width = 98
        Height = 16
        Caption = #1054#1088#1075#1072#1085#1099' '#1076#1099#1093#1072#1085#1080#1103
        FocusControl = dbeOrganyDYHAniy
      end
      object lb6: TLabel
        Left = 0
        Top = 277
        Width = 129
        Height = 16
        Caption = #1054#1088#1075#1072#1085#1099' '#1087#1080#1097#1077#1074#1072#1088#1077#1085#1080#1103
        FocusControl = dbeOrganyPIsishevarenia
      end
      object lb7: TLabel
        Left = 0
        Top = 328
        Width = 103
        Height = 16
        Caption = #1052#1086#1095#1077#1074#1072#1103' '#1089#1080#1089#1090#1077#1084#1072
        FocusControl = dbeMochevaySys
      end
      object dbeSerdce: TDBEdit
        Left = 223
        Top = 21
        Width = 200
        Height = 24
        DataField = 'SERDCE_OSMOTR'
        DataSource = dmMain.dsPat
        TabOrder = 0
      end
      object dbePuls: TDBEdit
        Left = 223
        Top = 59
        Width = 200
        Height = 24
        DataField = 'PULS_OSMOTR'
        DataSource = dmMain.dsPat
        TabOrder = 1
      end
      object dbeOrganyDYHAniy: TDBEdit
        Left = 223
        Top = 223
        Width = 200
        Height = 24
        DataField = 'ORGANY_DYHANIYA'
        DataSource = dmMain.dsPat
        TabOrder = 2
      end
      object dbeOrganyPIsishevarenia: TDBEdit
        Left = 223
        Top = 274
        Width = 200
        Height = 24
        DataField = 'PISHEVARENIE_OSMOTR'
        DataSource = dmMain.dsPat
        TabOrder = 3
      end
      object dbeMochevaySys: TDBEdit
        Left = 223
        Top = 325
        Width = 200
        Height = 24
        DataField = 'MOCHEVAYA_SIST_OSMOTR'
        DataSource = dmMain.dsPat
        TabOrder = 4
      end
      object dbeADpravaySyS: TDBEdit
        Left = 223
        Top = 122
        Width = 104
        Height = 24
        DataField = 'AD_RIGHT_SYST'
        DataSource = dmMain.dsPat
        TabOrder = 5
      end
      object dbeADlevaySYS: TDBEdit
        Left = 223
        Top = 168
        Width = 104
        Height = 24
        DataField = 'AD_LEFT_SYST'
        DataSource = dmMain.dsPat
        TabOrder = 6
      end
      object dbeADpravayDIAS: TDBEdit
        Left = 333
        Top = 122
        Width = 104
        Height = 24
        DataField = 'AD_RIGHT_DIAST'
        DataSource = dmMain.dsPat
        TabOrder = 7
      end
      object dbeADlevayDIAS: TDBEdit
        Left = 333
        Top = 168
        Width = 104
        Height = 24
        DataField = 'AD_LEFT_DIAST'
        DataSource = dmMain.dsPat
        TabOrder = 8
      end
    end
  end
end
